﻿Imports System
Imports System.Collections
Imports System.Text
Imports System.Configuration
Imports System.Xml
Namespace OpenArchive
    Namespace System
        Namespace Configuration
            Public Class ArchiveConfigurationSection
                Inherits ConfigurationSection
                <ConfigurationProperty("SystemSettings", IsDefaultCollection:=False)> _
                Public ReadOnly Property Systemsettings() As KeyValueConfigurationCollection
                    Get
                        Return CType(Me("SystemSettings"), KeyValueConfigurationCollection)
                    End Get
                End Property
                <ConfigurationProperty("Archives", IsDefaultCollection:=False)> _
                    Public ReadOnly Property Archives() As ArchivesConfigurationCollection
                    Get
                        Return CType(Me("Archives"), ArchivesConfigurationCollection)
                    End Get
                End Property
                <ConfigurationProperty("SystemFiles", IsDefaultCollection:=False)> _
                    Public ReadOnly Property SystemFiles() As ArchivesConfigurationCollection
                    Get
                        Return CType(Me("SystemFiles"), ArchivesConfigurationCollection)
                    End Get
                End Property
                Protected Overrides Sub DeserializeSection(ByVal reader As XmlReader)
                    MyBase.DeserializeSection(reader)
                End Sub 'DeserializeSection

                Protected Overrides Function SerializeSection(ByVal parentElement As ConfigurationElement, ByVal name As String, ByVal saveMode As ConfigurationSaveMode) As String
                    Dim s As String = MyBase.SerializeSection(parentElement, name, saveMode)
                    Return s
                End Function 'SerializeSection
            End Class
        End Namespace
    End Namespace
End Namespace